inherited FormCadastro2: TFormCadastro2
  Caption = 'FormCadastro2'
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
        end
      end
    end
  end
  inherited dsCadastro: TDataSource
    Left = 128
    Top = 352
  end
  inherited QCadastro: TQuery
    Active = True
    SQL.Strings = (
      'SELECT * FROM PAGFOR_LOTE_CABECALHO')
    Left = 72
    Top = 376
  end
  inherited dspCadastro: TDataSetProvider
    Left = 48
    Top = 344
  end
  inherited cdsCadastro: TClientDataSet
    Active = True
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 152
    Top = 136
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'PAGITENS_PAG_CODIGO'
    MasterFields = 'PAG_CODIGO'
    MasterSource = dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'DataSetProvider1'
    Left = 224
    Top = 104
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = Query1
    Constraints = True
    Left = 112
    Top = 200
  end
  object Query1: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT * FROM PAGFOR_LOTE_ITENS')
    Left = 240
    Top = 200
    ParamData = <
      item
        DataType = ftInteger
        Name = 'PAGITENS_PAG_CODIGO'
        ParamType = ptUnknown
        Value = 9
      end>
  end
end
